home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / GRAPHICS / TOOLS / TGDN / Textures / FFT_1D / LineDent < prev    next >
Text File  |  1996-11-11  |  2KB  |  58 lines

  1. StartColourDefinition
  2.   Dithering(&0)
  3.   LinearField(&0,&2)
  4.   LinearSegment(&FFFF,&D7B0,&0,&D0DA,SimpleAddition)
  5.   LinearSegment(&F43B,&A848,&E1C3,&2,SimpleAddition)
  6.   LinearSegment(&DA22,&C25D,&0,&A1B3,SimpleAddition)
  7.   LinearSegment(&719D,&CE76,&E971,&0,SimpleAddition)
  8.   LinearSegment(&D014,&9BB4,&2,&81AB,SimpleAddition)
  9.   LinearSegment(&16A1,&76B4,&E617,&0,SimpleAddition)
  10.   LinearSegment(&9811,&83C0,&0,&D2EE,SimpleAddition)
  11.   LinearSegment(&B5AD,&4851,&DA4C,&2,SimpleAddition)
  12.   OneDimensionalStoreBufferTwo
  13.   LinearField(&0,&2)
  14.   LinearSegment(&FFFB,&F1B4,&2,&A6D2,SimpleAddition)
  15.   LinearSegment(&ED91,&D3AD,&C7ED,&2,SimpleAddition)
  16.   LinearSegment(&E70F,&829A,&4,&4E89,SimpleAddition)
  17.   LinearSegment(&11CD,&596E,&B184,&2,SimpleAddition)
  18.   LinearSegment(&3EE3,&A2C,&2,&ED09,SimpleAddition)
  19.   LinearSegment(&BC3B,&237F,&E187,&2,SimpleAddition)
  20.   LinearSegment(&D2B8,&51DB,&0,&E346,SimpleAddition)
  21.   LinearSegment(&CBA4,&4D32,&704F,&2,SimpleAddition)
  22.   OneDimensionalStoreBufferOne
  23.   LinearField(&2,&0)
  24.   LinearSegment(&FFFD,&E04B,&0,&D072,SimpleAddition)
  25.   LinearSegment(&C8B6,&C4FD,&7422,&2,SimpleAddition)
  26.   LinearSegment(&BD77,&622C,&2,&8197,SimpleAddition)
  27.   LinearSegment(&78CB,&BA50,&F045,&2,SimpleAddition)
  28.   LinearSegment(&B8FE,&D44,&2,&FD09,SimpleAddition)
  29.   LinearSegment(&9027,&2596,&FA38,&2,SimpleAddition)
  30.   LinearSegment(&1874,&44A,&0,&FC14,SimpleAddition)
  31.   LinearSegment(&B59F,&7441,&C1FF,&0,SimpleAddition)
  32.   CreateColours(HSV)
  33. EndColourDefinition
  34.  
  35. Seed(&B)
  36. Phase(&2C)
  37. CreateOneDimensionalFilter(QuickNoise(&8116,&215))
  38. OneDimensionalTransform
  39. HorizontalWaves(Overwrite)
  40. VerticalShear(&2,Overwrite)
  41. CreateOneDimensionalFilter(QuickNoise(&AC24,&76))
  42. OneDimensionalTransform
  43. AddToPercentage(&12)
  44. HorizontalWaves(SimpleAddition)
  45. VerticalShear(&FFFF,Overwrite)
  46. TwoDimensionalEqualization
  47. LinearField(&EFFF,&6000)
  48. OneDimensionalStoreBufferOne
  49. For(&8)
  50.   AddToPercentage(&A)
  51.   Ripples(&FFFF,&2000,Random(&FFFF,&0),Random(&FFFF,&0),Maximise)
  52. Next
  53. Dithering(&2000)
  54. MakeSprite
  55. Checksum(&AD02)
  56. End
  57.  
  58.